url = "http://192.168.0.3:33334/"

goURL url, "GET", ""



sub goURL(url, method, data)
'uses the MSXML COM for http request
set objReq = CreateObject("Microsoft.XMLHTTP.1")
If method = "GET" Then
objReq.open "GET", url & "?" & data, False
objReq.Send ""
Else
objReq.open "POST", url, False
objReq.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
objReq.Send data
End If
set objReq = nothing
end sub